home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Internet / News / Alexandra.0.82 / Source / XText.subproj / XTScroller.m < prev   
Encoding:
Text File  |  1996-01-30  |  1.1 KB  |  42 lines

  1. #import "XTScroller.h"
  2.  
  3. @implementation XTScroller
  4.  
  5. - initFrame:(const NXRect *)frameRect
  6. {
  7.     NXRect rect = {0.0, 0.0, 0.0, 0.0};
  8.     NXSize s = {1.0E38, 1.0E38};
  9.     id my_xtext;
  10.     
  11.     // this is mostly cribbed from the TextLab example
  12.     // it's hard to believe that it needs to be this complicated
  13.  
  14.     [super initFrame:frameRect];
  15.      [self setBorderType:NX_BEZEL];
  16.     [[self setVertScrollerRequired:YES] setHorizScrollerRequired:NO];
  17.     
  18.     [self getContentSize:&(rect.size)];
  19.     my_xtext = [[XText alloc] initFrame:&rect];
  20.     [my_xtext setOpaque:YES];
  21.     [my_xtext notifyAncestorWhenFrameChanged:YES];
  22.     [my_xtext setVertResizable:YES];
  23.     [my_xtext setHorizResizable:NO];
  24.     [my_xtext setMonoFont:NO];
  25.     [my_xtext setDelegate:self];
  26.     
  27.     [my_xtext setMinSize:&(rect.size)];
  28.     [my_xtext setMaxSize:&s];
  29.     [my_xtext setAutosizing:NX_HEIGHTSIZABLE | NX_WIDTHSIZABLE];
  30.     
  31.     [my_xtext setCharFilter:NXEditorFilter];
  32.  
  33.     [self setDocView:my_xtext];
  34.     [my_xtext setSel:0 :0];    
  35.     
  36.     [contentView setAutoresizeSubviews:YES];
  37.     [contentView setAutosizing:NX_HEIGHTSIZABLE | NX_WIDTHSIZABLE];
  38.  
  39.     return self;
  40. }
  41. @end
  42.